home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus Special 13
/
AMIGAplus Sonderheft 13 (1998)(ICP)(DE)[!].iso
/
rexx
/
showprefs.sirexx
< prev
next >
Wrap
Text File
|
1997-08-28
|
2KB
|
93 lines
/* Display the current prefs settings */
options results
signal on error
address 'INSPECTOR.1'
/* The result will be <number><space><text>
If you want to parse that result, the first element will be the
your sort method number (needed if you want to SetPrefs), while the
rest will be some plain english name.
*/
Say 'Sort Methods:
'
Say ' '
GetPrefs LibDevSort ; Say 'Libs & Devs: '||result
GetPrefs MountSort ; Say 'Mount: '||result
GetPrefs ResidentSort ; Say 'Resident Modules: '||result
GetPrefs SemPortSort ; Say 'Semaphores & Message Ports: '||result
GetPrefs TaskSort ; Say 'Tasks: '||result
GetPrefs AssignSort ; Say 'Assigns: '||result
GetPrefs ScreenModeSort ; Say 'Screenmodes: '||result
Say ' '
Say ' '
/* Returns "On" or "Off" */
Say 'Options:
'
Say ' '
GetPrefs InitialDisplay ; Say 'Initial Displayed List: '||result
GetPrefs Deallocate ; Say 'Resource Deallocation: '||result
GetPrefs Confirm ; Say 'Confirm Actions: '||result
GetPrefs StripPath ; Say 'Strip process paths: '||result
GetPrefs OpenMore ; Say 'Open the More Window at Startup: '||result
GetPrefs Menufy ; Say 'Menufy when iconify: '||result
GetPrefs KillRequesters ; Say 'Kill DOS Requesters: '||result
GetPrefs RamLocks ; Say 'Scan RAM: for Locks: '||result
GetPrefs StartIconified ; Say 'Start Iconified: '||result
GetPrefs FormatHexValues ; Say 'Format hex values: '||result
GetPrefs DoubleClickForMore; Say 'DoubleClick opens More window: '||result
GetPrefs UseButtonArray ; Say 'Use the button array: '||result
GetPrefs PopupHelp ; Say 'Popup Help for the button array: '||result
Say ' '
Say ' '
/* Returns plain values */
Say 'Main Window coordinates:
'
Say ' '
GetPrefs WinX ; x = result
GetPrefs WinY ; y = result
GetPrefs WinWidth ; w = result
GetPrefs WinHeight ; h = result
Say 'Main window: ('||w||' x '||h||') at ('||x||','||y||')'
Say ' '
Say ' '
Say 'More Window coordinates:
'
Say ' '
GetPrefs MoreWinX ; x = result
GetPrefs MoreWinY ; y = result
GetPrefs MoreWinWidth ; w = result
GetPrefs MoreWinHeight ; h = result
Say 'More window: ('||w||' x '||h||') at ('||x||','||y||')'
Say ' '
Say ' '
Say 'AppIcon Coordinates:
'
Say ' '
GetPrefs IconX ; x = result
GetPrefs IconY ; y = result
Say 'AppIcon will appear at ('||x||','||y||')'